From: Chong Yidong <cyd@stupidchicken.com>
Date: Fri, 30 Mar 2007 01:54:04 +0000 (+0000)
Subject: (eshell/kill): Tweak regexp to recognize SIGUSR1 and SIGUSR2.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~29580
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=be6e5004e209fc008b44c07d770aa517fa6d47cb;p=emacs.git

(eshell/kill): Tweak regexp to recognize SIGUSR1 and SIGUSR2.
---

diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el
index d3dabbf04b5..96d8255a3ab 100644
--- a/lisp/eshell/esh-proc.el
+++ b/lisp/eshell/esh-proc.el
@@ -181,7 +181,7 @@ The signals which will cause this to happen are matched by
 	    (setq signum (abs (string-to-number id))))
 	   ((stringp id)
 	    (let (case-fold-search)
-	      (if (string-match "^-\\([A-Z]+\\)$" id)
+	      (if (string-match "^-\\([A-Z]+[12]?\\)$" id)
 		  (setq signum
 			(intern (concat "SIG" (match-string 1 id))))
 		(error "kill: bad signal spec `%s'" id))))